home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 3
/
Cream of the Crop 3.iso
/
clipper
/
ks94an.zip
/
MAKEDICT.HDR
< prev
next >
Wrap
Text File
|
1994-04-25
|
2KB
|
86 lines
/******************************************************************************
The Klipper Library, for CA-Clipper 5.x
Copyright (c), 1994, Wallace Information Systems Engineering
FUNCTION:
_MakeDict( cFileSpec ) --> NIL
PARAMETERS:
cFileSpec: the file extention to use (DEFAULT ALL FILES)
SHORT:
Create a file structure listing for all files meeting filespec criteria.
DESCRIPTION:
All dBASE III+ type databases with the extension specified in cFileSpec are
read and their structure is added to a file called DATADICT.TXT in a format
that is compatible with the #xtranslate Directives found in the KLIPPER.CH
header file. The resulting data dictionary can be used without modification
in your program.
If cFileSpec is not specified, the default is ALL files (those that are
database files are included).
Note also that dBASE III type extended structure databases are created for
your use. They have the extention .DFX You may delete them if they are not
needed.
NOTE:
EXAMPLE:
_MakeDict('DBF')
Result: DATADICT.TXT CONTAINS:
<top of file>
// STRUCTURE FOR: IBS_ACT.DBF
FILE_BEGIN IBS_ACT.DBF
FLD WORK_ORDER, C, 7
FLD LOCATION , N, 3
FILE_END IBS_ACT.DBF
// STRUCTURE FOR: IBS_ACTI.DBF
FILE_BEGIN IBS_ACTI.DBF
FLD WORK_ORDER, C, 7
FLD LOCATION , N, 3
FILE_END IBS_ACTI.DBF
// STRUCTURE FOR: IBS_USER.DBF
FILE_BEGIN IBS_USER.DBF
FLD NAME , C, 8
FLD FULLNAME , C, 32
FLD LOCATION , N, 3
FLD LEVEL , N, 1
FLD PASSWORD , C, 16
FILE_END IBS_USER.DBF
<end of file>
_MakeDict()
Result: Without any parameter specified, ALL files in the current directory
are scanned to see if they are dBASE III+ compatible databases and are
included in the above file if so.
******************************************************************************/